home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Third Party Demos / Networking / MacMainFrame / card_7235.txt < prev    next >
Text File  |  1989-07-14  |  3KB  |  145 lines

  1. -- card: 7235 from stack: in
  2. -- bmap block id: 16722
  3. -- flags: 4000
  4. -- background id: 2776
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   set lockText of card field 1 to false
  9.   delete line 1 of card field 1
  10.   wait 45 ticks
  11.   show card field id 4
  12.   choose browse tool
  13.   click at the loc of card field 1
  14.   type "demo file"
  15.   wait 20 ticks
  16.   show card field id 8
  17.   hide card field id 4
  18. end openCard
  19.  
  20.  
  21. -- part 2 (button)
  22. -- low flags: 00
  23. -- high flags: 0002
  24. -- rect: left=469 top=309 right=337 bottom=506
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 1012 / 1012
  27. -- text alignment: 1
  28. -- font id: 0
  29. -- text size: 12
  30. -- style flags: 0
  31. -- line height: 16
  32. -- part name: Return
  33. ----- HyperTalk script -----
  34. on mouseUp
  35.   set userLevel to 1
  36.   hide card field id 4
  37.   hide card field id 8
  38.   visual effect scroll left
  39.   go to card id 12102
  40. end mouseUp
  41.  
  42.  
  43.  
  44. -- part 3 (button)
  45. -- low flags: 00
  46. -- high flags: 0002
  47. -- rect: left=7 top=308 right=336 bottom=45
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 30557 / 30557
  50. -- text alignment: 1
  51. -- font id: 0
  52. -- text size: 12
  53. -- style flags: 0
  54. -- line height: 16
  55. -- part name: First
  56. ----- HyperTalk script -----
  57. on mouseUp
  58.   delete line 1 of card field 1
  59.   set userLevel to 1
  60.   hide card field id 4
  61.   hide card field id 8
  62.   visual effect scroll right
  63.   push card
  64.   go to card id 9514
  65.   show menuBar
  66. end mouseUp
  67.  
  68.  
  69.  
  70. -- part 4 (field)
  71. -- low flags: 80
  72. -- high flags: 0001
  73. -- rect: left=121 top=221 right=238 bottom=298
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 0 / 0
  76. -- text alignment: 0
  77. -- font id: 3
  78. -- text size: 12
  79. -- style flags: 0
  80. -- line height: 16
  81. -- part name: 
  82. ----- HyperTalk script -----
  83. on mouseEnter
  84.   set lockText of card field 1 to true
  85. end mouseEnter
  86.  
  87.  
  88. -- part 5 (button)
  89. -- low flags: 00
  90. -- high flags: 0000
  91. -- rect: left=396 top=191 right=213 bottom=427
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 9120 / 9120
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: New Button
  100.  
  101.  
  102. -- part 6 (button)
  103. -- low flags: 00
  104. -- high flags: A003
  105. -- rect: left=322 top=192 right=212 bottom=390
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 0 / 0
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: Save
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   hide card field id 4
  117.   hide card field id 8
  118.   go to card id 2362
  119.   set userLevel to 1
  120. end mouseUp
  121.  
  122.  
  123.  
  124.  
  125. -- part 8 (field)
  126. -- low flags: 81
  127. -- high flags: 0001
  128. -- rect: left=121 top=221 right=238 bottom=298
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 0
  132. -- font id: 3
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: 
  137.  
  138.  
  139. -- part contents for card part 8
  140. ----- text -----
  141. demo file
  142.  
  143. -- part contents for card part 4
  144. ----- text -----
  145. demo file